home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archivers / BlitzDMS / Install / BlitzDms-Installer next >
Encoding:
Text File  |  1996-09-27  |  2.6 KB  |  109 lines
  1. ; $VER: BlitzDms Install Script V1.0 (21.04.96) by Anthony Brice
  2. ;
  3. (set MSG_DESTINATION "Where would you like %s to be installed?\n(%s will be directly copied there)")
  4. (set MSG_COPYING "Going to copy %s to %s.")
  5. (set MSG_DOCS "Copying %s AmigaGuide document to %s")
  6. (set DOCUMENTATION "Where would you like the %s Guide document?")
  7. (set FONT "Install the supplied Fonts?\n%s can use with any size 8 or above font,\nand these are very nice examples.")
  8. (set LIBS "Would you like to install the ReqTools Library\n which %s needs to run? Newer versions will NOT\nbe overwritten!!")
  9. (set @abort-button "Forget it!")
  10. (set MSG_THANKS "Thank you for evaluating %s!\nPlease remember that it is shareware and registration\nSupports future Amiga development\n")
  11.  
  12. (set #bad-kick
  13. (cat "BlitzDms 1.01 will only run under KickStart 2.04 or above!"
  14. ))
  15.  
  16. (if (< (/ (getversion) 65536) 37) (abort #bad-kick))
  17.  
  18. (complete 0)
  19.  
  20. ; Choose default tool for guide, depending on user's OS version
  21.  
  22. (set osversion  (/ (getversion) 65536))
  23. (if (>= osversion 39)
  24.    (set guide_reader "MultiView") 
  25.    (set guide_reader "AmigaGuide")
  26. )
  27.  
  28. (complete 10)
  29.  
  30. (set installed "")
  31.  
  32. (set dest_dir
  33.    (askdir (prompt (MSG_DESTINATION @app-name @app-name))
  34.            (help @askdir-help)
  35.            (default "Ram:")
  36.            (newpath))
  37. )
  38.  
  39. (set @default-dest dest_dir)
  40.  
  41. (complete 20)
  42.  
  43. (copyfiles  (prompt (MSG_COPYING @app-name @default-dest))
  44.             (help @copyfiles-help)
  45.             (source "/")
  46.             (Pattern "BlitzDms#?")
  47.             (dest dest_dir)
  48. )
  49.  
  50. (complete 40)
  51.  
  52. (set dest_dir
  53.    (askdir (prompt (DOCUMENTATION @app-name))
  54.            (help @askdir-help)
  55.            (default "Ram:")
  56.            (newpath))
  57. )
  58.  
  59. (set @default-dest dest_dir)
  60.  
  61. (complete 50)
  62.  
  63. (copyfiles  (prompt (MSG_DOCS @app-name @default-dest))
  64.             (help @copyfiles-help)
  65.             (source "/docs/")
  66.             (Pattern "#?guide#?")
  67.             (dest dest_dir)
  68. )
  69.  
  70. (complete 60)
  71.  
  72. (copyfiles  (prompt (FONT @app-name))
  73.             (help @copyfiles-help)
  74.             (source "/fonts/")
  75.             (pattern "#?")
  76.             (dest "Fonts:")
  77.             (fonts)
  78.             (confirm)
  79. )
  80.  
  81. (complete 70)
  82.  
  83. (copylib    (prompt (LIBS @app-name))
  84.             (help @copyfiles-help)
  85.             (source "/libs/reqtools.library")
  86.             (dest "Libs:")
  87.             (confirm)
  88. )
  89.  
  90. (complete 90)
  91.  
  92. (if (exists (tackon @default-dest "BlitzDms.guide.info") (noreq))
  93.    (
  94.       (tooltype   (dest (tackon @default-dest "BlitzDms.guide"))
  95.                   (noposition) (setdefaulttool guide_reader))
  96.       (set installed "YES")         
  97.   )
  98. )
  99.  
  100. (complete 100)
  101.  
  102. (if (= installed "YES") 
  103.    (exit (MSG_THANKS @app-name))
  104.    (exit)
  105. )   
  106.  
  107. ; End of BlitzDms-Installer script !
  108.  
  109.